home *** CD-ROM | disk | FTP | other *** search
Wrap
Text File | 1995-07-06 | 8.7 KB | 116 lines | [ TEXT/MPS ]
{ File: GXLayout.p Contains: QuickDraw GX layout routine interfaces. Version: Technology: Quickdraw GX 1.1 Package: Universal Interfaces 2.1 in “MPW Latest” on ETO #18 Copyright: © 1984-1995 by Apple Computer, Inc. All rights reserved. Bugs?: If you find a problem with this file, use the Apple Bug Reporter stack. Include the file and version information (from above) in the problem description and send to: Internet: apple.bugs@applelink.apple.com AppleLink: APPLE.BUGS } {$IFC UNDEFINED UsingIncludes} {$SETC UsingIncludes := 0} {$ENDC} {$IFC NOT UsingIncludes} UNIT GXLayout; INTERFACE {$ENDC} {$IFC UNDEFINED __GXLAYOUT__} {$SETC __GXLAYOUT__ := 1} {$I+} {$SETC GXLayoutIncludes := UsingIncludes} {$SETC UsingIncludes := 1} {$IFC UNDEFINED __CONDITIONALMACROS__} {$I ConditionalMacros.p} {$ENDC} {$IFC UNDEFINED __GXTYPES__} {$I GXTypes.p} {$ENDC} { Types.p } { MixedMode.p } { GXMath.p } { FixMath.p } {$PUSH} {$ALIGN MAC68K} {$LibExport+} {$SETC layoutRoutinesIncludes := 1} FUNCTION GXNewLayout(textRunCount: LONGINT; textRunLengths: INTEGER; text: UNIV Ptr; styleRunCount: LONGINT; styleRunLengths: INTEGER; styles: gxStyle; levelRunCount: LONGINT; levelRunLengths: INTEGER; levels: INTEGER; {CONST}VAR layoutOptions: gxLayoutOptions; {CONST}VAR position: gxPoint): gxShape; C; FUNCTION GXGetLayout(layout: gxShape; text: UNIV Ptr; VAR styleRunCount: LONGINT; styleRunLengths: INTEGER; styles: gxStyle; VAR levelRunCount: LONGINT; levelRunLengths: INTEGER; levels: INTEGER; VAR layoutOptions: gxLayoutOptions; VAR position: gxPoint): LONGINT; C; PROCEDURE GXSetLayout(layout: gxShape; textRunCount: LONGINT; textRunLengths: INTEGER; text: UNIV Ptr; styleRunCount: LONGINT; styleRunLengths: INTEGER; styles: gxStyle; levelRunCount: LONGINT; levelRunLengths: INTEGER; levels: INTEGER; {CONST}VAR layoutOptions: gxLayoutOptions; {CONST}VAR position: gxPoint); C; PROCEDURE GXDrawLayout(textRunCount: LONGINT; textRunLengths: INTEGER; text: UNIV Ptr; styleRunCount: LONGINT; styleRunLengths: INTEGER; styles: gxStyle; levelRunCount: LONGINT; levelRunLengths: INTEGER; levels: INTEGER; {CONST}VAR layoutOptions: gxLayoutOptions; {CONST}VAR position: gxPoint); C; PROCEDURE GXSetLayoutParts(layout: gxShape; oldStartOffset: gxByteOffset; oldEndOffset: gxByteOffset; newTextRunCount: LONGINT; newTextRunLengths: INTEGER; newText: UNIV Ptr; newStyleRunCount: LONGINT; newStyleRunLengths: INTEGER; newStyles: gxStyle; newLevelRunCount: LONGINT; newLevelRunLengths: INTEGER; newLevels: INTEGER); C; PROCEDURE GXSetLayoutShapeParts(layout: gxShape; startOffset: gxByteOffset; endOffset: gxByteOffset; insert: gxShape); C; FUNCTION GXGetLayoutParts(layout: gxShape; startOffset: gxByteOffset; endOffset: gxByteOffset; text: UNIV Ptr; VAR styleRunCount: LONGINT; styleRunLengths: INTEGER; styles: gxStyle; VAR levelRunCount: LONGINT; levelRunLengths: INTEGER; levels: INTEGER): LONGINT; C; FUNCTION GXGetLayoutShapeParts(layout: gxShape; startOffset: gxByteOffset; endOffset: gxByteOffset; dest: gxShape): gxShape; C; FUNCTION GXGetLayoutGlyphs(layout: gxShape; VAR glyphs: gxGlyphcode; positions: gxPoint; advance: LONGINT; tangents: gxPoint; VAR runCount: LONGINT; styleRuns: INTEGER; glyphStyles: gxStyle): LONGINT; C; FUNCTION GXHitTestLayout(layout: gxShape; {CONST}VAR hitDown: gxPoint; highlightType: gxHighlightType; VAR hitInfo: gxLayoutHitInfo; hitTrackingArea: gxShape): gxByteOffset; C; FUNCTION GXGetLayoutHighlight(layout: gxShape; startOffset: gxByteOffset; endOffset: gxByteOffset; highlightType: gxHighlightType; highlight: gxShape): gxShape; C; FUNCTION GXGetLayoutVisualHighlight(layout: gxShape; startOffset: gxByteOffset; startLeadingEdge: LONGINT; endOffset: gxByteOffset; endLeadingEdge: LONGINT; highlightType: gxHighlightType; highlight: gxShape): gxShape; C; FUNCTION GXGetLayoutCaret(layout: gxShape; offset: gxByteOffset; highlightType: gxHighlightType; caretType: gxCaretType; caret: gxShape): gxShape; C; FUNCTION GXGetLayoutBreakOffset(layout: gxShape; startOffset: gxByteOffset; lineWidth: Fixed; hyphenationCount: LONGINT; hyphenationPoints: gxByteOffset; VAR startIsStaked: BOOLEAN; VAR priorStake: gxByteOffset; VAR nextStake: gxByteOffset): gxByteOffset; C; FUNCTION GXGetLayoutRangeWidth(layout: gxShape; startOffset: gxByteOffset; endOffset: gxByteOffset; supplementaryText: gxShape): Fixed; C; FUNCTION GXNewLayoutFromRange(layout: gxShape; startOffset: gxByteOffset; endOffset: gxByteOffset; {CONST}VAR layoutOptions: gxLayoutOptions; supplementaryText: gxShape): gxShape; C; FUNCTION GXGetCaretAngleArea(layout: gxShape; {CONST}VAR hitPoint: gxPoint; highlightType: gxHighlightType; caretArea: gxShape; VAR returnedRise: INTEGER; VAR returnedRun: INTEGER): gxShape; C; PROCEDURE GXGetStyleBaselineDeltas(baseStyle: gxStyle; baseType: gxBaselineType; VAR returnedDeltas: gxBaselineDeltas); C; FUNCTION GXGetRightVisualOffset(layout: gxShape; currentOffset: gxByteOffset): gxByteOffset; C; FUNCTION GXGetLeftVisualOffset(layout: gxShape; currentOffset: gxByteOffset): gxByteOffset; C; PROCEDURE GXGetCompoundCharacterLimits(layout: gxShape; trial: gxByteOffset; VAR minOffset: gxByteOffset; VAR maxOffset: gxByteOffset; VAR onBoundary: BOOLEAN); C; PROCEDURE GXGetOffsetGlyphs(layout: gxShape; trial: gxByteOffset; leadingEdge: LONGINT; VAR offsetState: gxLayoutOffsetState; VAR firstGlyph: INTEGER; VAR secondGlyph: INTEGER); C; PROCEDURE GXGetGlyphOffset(layout: gxShape; trial: LONGINT; onLeftTop: LONGINT; VAR offset: gxByteOffset; VAR leadingEdge: BOOLEAN; VAR wasRealCharacter: BOOLEAN); C; PROCEDURE GXGetLayoutSpan(layout: gxShape; VAR lineAscent: Fixed; VAR lineDescent: Fixed); C; PROCEDURE GXSetLayoutSpan(layout: gxShape; lineAscent: Fixed; lineDescent: Fixed); C; FUNCTION GXGetLayoutJustificationGap(layout: gxShape): Fixed; C; PROCEDURE GXGetLayoutJustificationFactors(layout: gxShape; constrainedFactors: Fixed; unconstrainedFactors: Fixed); C; PROCEDURE GXSetStyleRunControls(target: gxStyle; {CONST}VAR runControls: gxRunControls); C; PROCEDURE GXSetStyleRunPriorityJustOverride(target: gxStyle; {CONST}VAR priorityJustificationOverride: gxPriorityJustificationOverride); C; PROCEDURE GXSetStyleRunGlyphJustOverrides(target: gxStyle; count: LONGINT; glyphJustificationOverrides: gxGlyphJustificationOverride); C; PROCEDURE GXSetStyleRunGlyphSubstitutions(target: gxStyle; count: LONGINT; glyphSubstitutions: gxGlyphSubstitution); C; PROCEDURE GXSetStyleRunFeatures(target: gxStyle; count: LONGINT; runFeatures: gxRunFeature); C; PROCEDURE GXSetStyleRunKerningAdjustments(target: gxStyle; count: LONGINT; kerningAdjustments: gxKerningAdjustment); C; PROCEDURE GXSetShapeRunControls(target: gxShape; {CONST}VAR runControls: gxRunControls); C; PROCEDURE GXSetShapeRunPriorityJustOverride(target: gxShape; {CONST}VAR priorityJustificationOverride: gxPriorityJustificationOverride); C; PROCEDURE GXSetShapeRunGlyphJustOverrides(target: gxShape; count: LONGINT; glyphJustificationOverrides: gxGlyphJustificationOverride); C; PROCEDURE GXSetShapeRunGlyphSubstitutions(target: gxShape; count: LONGINT; glyphSubstitutions: gxGlyphSubstitution); C; PROCEDURE GXSetShapeRunFeatures(target: gxShape; count: LONGINT; runFeatures: gxRunFeature); C; PROCEDURE GXSetShapeRunKerningAdjustments(target: gxShape; count: LONGINT; kerningAdjustments: gxKerningAdjustment); C; FUNCTION GXGetStyleRunControls(source: gxStyle; VAR runControls: gxRunControls): LONGINT; C; FUNCTION GXGetStyleRunPriorityJustOverride(source: gxStyle; VAR priorityJustificationOverride: gxPriorityJustificationOverride): LONGINT; C; FUNCTION GXGetStyleRunGlyphJustOverrides(source: gxStyle; glyphJustificationOverrides: gxGlyphJustificationOverride): LONGINT; C; FUNCTION GXGetStyleRunGlyphSubstitutions(source: gxStyle; glyphSubstitutions: gxGlyphSubstitution): LONGINT; C; FUNCTION GXGetStyleRunFeatures(source: gxStyle; runFeatures: gxRunFeature): LONGINT; C; FUNCTION GXGetStyleRunKerningAdjustments(source: gxStyle; kerningAdjustments: gxKerningAdjustment): LONGINT; C; FUNCTION GXGetShapeRunControls(source: gxShape; VAR runControls: gxRunControls): LONGINT; C; FUNCTION GXGetShapeRunPriorityJustOverride(source: gxShape; VAR priorityJustificationOverride: gxPriorityJustificationOverride): LONGINT; C; FUNCTION GXGetShapeRunGlyphJustOverrides(source: gxShape; glyphJustificationOverrides: gxGlyphJustificationOverride): LONGINT; C; FUNCTION GXGetShapeRunGlyphSubstitutions(source: gxShape; glyphSubstitutions: gxGlyphSubstitution): LONGINT; C; FUNCTION GXGetShapeRunFeatures(source: gxShape; runFeatures: gxRunFeature): LONGINT; C; FUNCTION GXGetShapeRunKerningAdjustments(source: gxShape; kerningAdjustments: gxKerningAdjustment): LONGINT; C; {$ALIGN RESET} {$POP} {$SETC UsingIncludes := GXLayoutIncludes} {$ENDC} {__GXLAYOUT__} {$IFC NOT UsingIncludes} END. {$ENDC}